Chip 2007 January, February, March & April/Chip-Cover-CD-2007-02.iso/Pakiet internetowy/Czytniki NEWS/40Tude Dialog 2.0.15.1 beta 38/4d2b38.exe/{app}/dialog.exe/0/RCDATA/TFRMCOLUMNSETUP/TFRMCOLUMNSETUP.txt

Text File | 2005-02-07 | 9.1 KB | 389 lines

object frmColumnSetup: TfrmColumnSetup
  Left = 26
  Top = 158
  BorderIcons = [biSystemMenu]
  BorderStyle = bsSingle
  Caption = 'Columns editor'
  ClientHeight = 313
  ClientWidth = 440
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Button1: TMMTNTBItBtn
    Left = 280
    Top = 288
    Width = 75
    Height = 25
    Caption = '&Ok'
    Default = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 2
  end
  object Button2: TMMTNTBItBtn
    Left = 360
    Top = 288
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Cancel'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    TabOrder = 3
  end
  object PageControl1: TTntPageControl
    Left = 0
    Top = 0
    Width = 440
    Height = 281
    ActivePage = TabSheet1
    Align = alTop
    TabOrder = 0
    object TabSheet1: TTntTabSheet
      Caption = 'Setup'
      object Label1: TTntLabel
        Left = 4
        Top = 4
        Width = 107
        Height = 13
        Caption = '&Available columns:'
        FocusControl = ColumnList
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TTntLabel
        Left = 164
        Top = 4
        Width = 99
        Height = 13
        Caption = 'Selected column:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label3: TTntLabel
        Left = 164
        Top = 32
        Width = 39
        Height = 13
        Caption = '&Caption:'
        FocusControl = CaptionEdit
      end
      object Label4: TTntLabel
        Tag = 2
        Left = 164
        Top = 88
        Width = 49
        Height = 13
        Caption = '&Alignment:'
        FocusControl = AlignmentCB
      end
      object Label5: TTntLabel
        Left = 164
        Top = 60
        Width = 40
        Height = 13
        Caption = 'Co&ntent:'
        FocusControl = ContentEdit
      end
      object Label6: TTntLabel
        Tag = 2
        Left = 164
        Top = 200
        Width = 36
        Height = 13
        Caption = '&Sort by:'
      end
      object Label7: TTntLabel
        Left = 164
        Top = 116
        Width = 40
        Height = 13
        Caption = 'Co&lorize:'
      end
      object Label8: TTntLabel
        Left = 164
        Top = 144
        Width = 24
        Height = 13
        Caption = '&Bold:'
      end
      object Bevel1: TBevel
        Left = 148
        Top = 4
        Width = 2
        Height = 245
        Shape = bsFrame
      end
      object Label9: TTntLabel
        Left = 164
        Top = 172
        Width = 48
        Height = 13
        Caption = '&Underline:'
        FocusControl = UnderlineCB
      end
      object ColumnList: TTntListBox
        Left = 4
        Top = 24
        Width = 137
        Height = 169
        ExtendedSelect = False
        ItemHeight = 13
        TabOrder = 0
        OnClick = ColumnListClick
      end
      object CaptionEdit: TTntEdit
        Left = 252
        Top = 28
        Width = 180
        Height = 21
        TabOrder = 5
        OnChange = CaptionEditChange
      end
      object AlignmentCB: TTntComboBox
        Tag = 2
        Left = 252
        Top = 84
        Width = 180
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 7
        OnChange = CaptionEditChange
        Items.WideStrings = (
          'Left'
          'Right'
          'Center')
      end
      object ContentEdit: TTntEdit
        Left = 252
        Top = 56
        Width = 180
        Height = 21
        TabOrder = 6
        OnChange = CaptionEditChange
      end
      object SortByCB: TTntComboBox
        Tag = 2
        Left = 252
        Top = 196
        Width = 180
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 11
        OnChange = CaptionEditChange
        Items.WideStrings = (
          'None'
          'Thread, Date'
          'Thread, Max. Score, Date'
          'Thread, Av.Score, Date'
          'Date'
          'From, Date'
          'Subject, Date'
          'MsgID, Date'
          'Lines, Date'
          'Score, Date'
          'Bytes, Date'
          'Thread, Max. Score, Rev. Date'
          'Thread, Av.Score, Rev. Date')
      end
      object ColorCB: TTntComboBox
        Left = 252
        Top = 112
        Width = 180
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 8
        OnChange = CaptionEditChange
        Items.WideStrings = (
          'Always'
          'If unread'
          'If body available'
          'If unread body available'
          'If has new childs'
          'If has new childs and is first in thread'
          'If is first in thread')
      end
      object StyleCB: TTntComboBox
        Left = 252
        Top = 140
        Width = 180
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 9
        OnChange = CaptionEditChange
        Items.WideStrings = (
          'Always'
          'If unread'
          'If body available'
          'If unread body available'
          'If has new childs'
          'If has new childs and is first in thread'
          'If is first in thread')
      end
      object ServerNewBtn: TMMTNTBItBtn
        Left = 8
        Top = 196
        Width = 70
        Height = 25
        Caption = '&New'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBtnText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = ServerNewBtnClick
      end
      object ServerDeleteBtn: TMMTNTBItBtn
        Left = 8
        Top = 224
        Width = 70
        Height = 25
        Caption = '&Delete'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBtnText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = ServerDeleteBtnClick
      end
      object UpBtn: TMMTNTBItBtn
        Tag = -1
        Left = 88
        Top = 196
        Width = 51
        Height = 25
        Caption = '&Up'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBtnText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = UpBtnClick
      end
      object DownBtn: TMMTNTBItBtn
        Tag = 1
        Left = 88
        Top = 224
        Width = 51
        Height = 25
        Caption = 'Do&wn'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBtnText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = UpBtnClick
      end
      object UnderlineCB: TTntComboBox
        Left = 252
        Top = 168
        Width = 180
        Height = 21
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 10
        OnChange = CaptionEditChange
        Items.WideStrings = (
          'Always'
          'If unread'
          'If body available'
          'If unread body available'
          'If has new childs'
          'If has new childs and is first in thread'
          'If is first in thread')
      end
      object RemainingWidthCB: TtntAutoSizeCheckBox
        Tag = 1
        Left = 164
        Top = 228
        Width = 194
        Height = 17
        Caption = 'This column gets the &remaining width'
        TabOrder = 12
        OnClick = RemainingWidthCBClick
      end
    end
    object TabSheet2: TTntTabSheet
      Caption = 'Help'
      ImageIndex = 1
      object Label10: TTntLabel
        Left = 0
        Top = 0
        Width = 85
        Height = 13
        Align = alTop
        Caption = 'Content variables:'
      end
      object Memo1: TTntMemo
        Left = 0
        Top = 13
        Width = 432
        Height = 240
        TabStop = False
        Align = alClient
        ReadOnly = True
        ScrollBars = ssVertical
        TabOrder = 0
      end
    end
  end
  object DefLayoutBtn: TMMTNTBItBtn
    Left = 4
    Top = 288
    Width = 201
    Height = 25
    Caption = 'Revert to default &layout'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBtnText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    TabOrder = 1
    OnClick = DefLayoutBtnClick
  end
end